home *** CD-ROM | disk | FTP | other *** search
/ Language/OS - Multiplatform Resource Library / LANGUAGE OS.iso / cocktail / rpp.lha / rpp / m2c / rpp.c < prev    next >
C/C++ Source or Header  |  1992-08-18  |  439b  |  32 lines
  1. #include "SYSTEM_.h"
  2.  
  3. #ifndef DEFINITION_Scanner
  4. #include "Scanner.h"
  5. #endif
  6.  
  7. #ifndef DEFINITION_IO
  8. #include "IO.h"
  9. #endif
  10.  
  11. #ifndef DEFINITION_System
  12. #include "System.h"
  13. #endif
  14.  
  15. static INTEGER Token;
  16.  
  17.  
  18. void BEGIN_MODULE()
  19. {
  20.   BEGIN_Scanner();
  21.   BEGIN_IO();
  22.   BEGIN_System();
  23.  
  24.   Scanner_BeginScanner();
  25.   do {
  26.     Token = Scanner_GetToken();
  27.   } while (!(Token == Scanner_EofToken));
  28.   Scanner_CloseScanner();
  29.   IO_CloseIO();
  30.   Exit(0L);
  31. }
  32.